<% search = Request("search") criteria = Request("criteria") set conn = GetSQLServerConnection() if search = "" then SQL = "Select * from Counseling_forum where fdate <='" & date &"' order by fdate desc, tdate desc" set rs = GetSQLServerRecordset(conn,SQL) ElseIf criteria = "both" Then SQL = "Select * from Counseling_forum where main = '1' And (title Like '%" & search & "%' Or content Like '%" & search & "%') and fdate <= '" & date & "' Order By fdate asc, tdate asc" Set rs = GetSQLServerRecordset(conn, SQL) Else SQL = "Select * from Counseling_forum where main = '1' And " & criteria & " Like '%" & search & "%' and fdate <= '" & date & "' order By fdate asc, tdate asc" Set rs = GetSQLServerRecordset(conn, SQL) End If cid = request("cid") cid = CInt(cid) set conn = GetSQLServerConnection() if cid = 0 then response.redirect "forum.asp" else SQL = "Select * from Counseling_forum where cid = " & cid & " and main = 1" set rs = GetSQLServerRecordset(conn, SQL) SQL = "Select * from Counseling_forum where reply_cid = '" & cid & "' and main = '0' and flag = '1' order by rid desc" set reply_rs = GetSQLServerRecordset(conn, SQL) end if reply_rs.PageSize = 10 if page = "" or page < 1 then page = 1 elseif page > rs.PageCount then page = 1 end if %> Youth-2000.com [滅罪會 On-line Counseling]
成為會員 關於我們 聯絡我們 設成首頁
 
合辦
贊助
<% while not rs.EOF %>
主題 內容 主題和內容
主題：<%=rs("title")%> 共有<%=rs("no")%>個留言
時間:<%=ChangeDateFormat(rs("fdate"))%> 至 <%=ChangeDateFormat(rs("tdate"))%>
<% title = rs("title") rs.movenext %> <% wend %> <% If reply_rs.EOF Then page = 1 Else reply_rs.AbsolutePage = page For I = 1 To reply_rs.PageSize 'datetime = rs_reply("date") & " (" & WeekDayName(WeekDay(rs_reply("date"))) &")" 'reply_content = Replace(rs_reply("content"), Chr(13), "
") %>
回應<%=title%>留言
留言者:<%=reply_rs("name")%>, 時間:<%=ChangeDateFormat(reply_rs("fdate"))%>
" width="29" height="28"> <%=reply_rs("content")%>
  回應
<% reply_rs.MoveNext If reply_rs.EOF Then Exit For End If Next End If %>
| 上一頁 | 第 <%=page%> 頁 | 下一頁 |
 
 
     
關 於 我 們 | 網 站 聲 明 | 私 隱 政 策 聲 明 | 服 務 條 款 | 聯 絡 我 們
Copyright© YouthOnline Association. All rights reserved.

Warning: require(../AspLib.php) [function.require]: failed to open stream: No such file or directory in /home/youth/domains/youth-online.com/public_html/dfcc_counseling/forum_content.php on line 184

Fatal error: require() [function.require]: Failed opening required '../AspLib.php' (include_path='.:/usr/local/lib/php') in /home/youth/domains/youth-online.com/public_html/dfcc_counseling/forum_content.php on line 184